#Ĉق猊o
<out>
fade(out,(type=holcircle,color=000000,wait=16)); fc(*actor,moved,x-); if(nowres); fc(*actor,move,-1,11,center); else; fc(*actor,move,38,-17,center); endif; changemap(tB[h); fade(in,(type=fade,color=000000,wait=16));
#fc(move,*actor,2,38,-17,); changemap(tB[h);
#fade(mosaic,1,256,16); fc(move,*actor,2,38,-17,); changemap(tB[h); fade(mosaic,2,256,16);


<loop>
#fc(dir,*actor,==,0);
fc(*actor,moved,x+); or; fc(c5,apr,==,1); or; fc(c6,apr,==,1); or; fc(c7,apr,==,1); or; fc(c8,apr,==,1); if(nowres);
fc(*actor,move,-11,0,slide);

#qgΔo
fc(*actor,moved,x+); unif(nowres); evflag(*inmap:looped,<,2); if(nowres); evflag(*inmap:looped,+=,1); else; fc(c2,apr,=,1); endif; endif;

endif;


<gate1>
fc(c5,apr,=,0); fc(c6,apr,=,1);


<gate2>
#fc(dir,*actor,==,3); if(nowres); fc(apr,c6,=,0); end; endif;
#fc(dir,*actor,==,2); if(nowres); fc(apr,c6,=,0); fc(apr,c5,=,1); end; endif;
fc(*actor,moved,y-); if(nowres); fc(c6,apr,=,0); end; endif;
fc(*actor,moved,y+); if(nowres); fc(c6,apr,=,0); fc(c5,apr,=,1); end; endif;


<gate3>
fc(c7,apr,=,0); fc(c8,apr,=,1);


<gate4>
#fc(dir,*actor,==,0); if(nowres); fc(apr,c8,=,0); end; endif;
#fc(dir,*actor,==,1); if(nowres); fc(apr,c8,=,0); fc(apr,c7,=,1); end; endif;
fc(*actor,moved,x+); if(nowres); fc(c8,apr,=,0); end; endif;
fc(*actor,moved,x-); if(nowres); fc(c8,apr,=,0); fc(c7,apr,=,1); end; endif;


#{X
<boss>
subevent(passbattle,); if(nowres); fc(*target,apr,=,0); end; endif;
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=O[yM,bgm=battle2:0,stm=0,downefc=down3)); fade(in2,);
#fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle(Kp~R,*def,, (battle2,0),(*def,def),(*def,def), , 0,,); fade(in,def,,,);
#battle(Kp~Q,*def,, battle2,0,,,def,def, , 0,,);
#evflag(*selected,==,3); if(nowres); goto(1); endif;
evflag(*selected,==,1); if(nowres); fc(*target,apr,=,0); end; endif;
evflag(*selected,==,3); if(nowres); label(1); fc(*actor,walk,0,8,0,1,u); return; end; endif;
#btres(escaped);


#ACe
<mixitem>
text(1,face=uam,ACeIȎł悤B);
buy(gousei1,only);
#select(*mACe̍n(cid=,udev=@update_mixitem,dnev=@done_mixitem));


#[vEoqg
<brd_seacave>
#text(1,face=+evfch,ɖ҂Aقiނ̂B);
text(1,face=+evfch,ߓōς܂ƂȂ΁Aiɓ͑ł낤ccB);


#ɒqg
<brd_jikken>
text(1,face=+evfch,Ӂ\nł̗͐ނ͍ł܂B);
#zukan(item:ɒ,==,1); if(nowres); text(1,face=uam,w%it[*ɒ].nmicxB); end; endif;
#item(check:6,fʋ@,1);
#text(1,face=+evfch,LmR̓ɒnւ̓LBɑȂ@ōsł邾낤B܂×~ɂȂ̂ȂB);
#text(1,face=+evfch,LmR̓ɒnւ̓LBɑȂ@ōsł邾낤B܂×~ɂȂ̂ȂB);


#ŃK[hUqg
<brd_hyesc>
text(1,face=+evfch,؂鋫蓦ċAĂׂ݂B);
#text(1,face=+evfch,鋫蓦ċAƁA񔃃ACeɓBALOȏ̈Ӗ͖̂ŁACɂ鎖ȂB);
item(check:aleq|alpt|bank,ŃK[hU,1); if(nowres); text(1,face=uam,w%it[*ŃK[hU].nmicx̉@ɂĂ̕⑫悤B); endif;